#!/usr/bin/env tclsh
# Generate Android wedget like buttons and associated event handlers
# Assumptions:
# 1.) Eclipse workspace
# 2.) Android code
# 3.) TCL lib is installed; fileUtil came from tcllib
# 4.) TclReadLine.tcl is located in the same directory as this script

namespace eval A {}
package provide A [lindex {$Revision: 1.0 $} 1]
set auto_path [lreplace $auto_path 0 -1 .]

package require fileutil
package require TclReadLine
package require db
package require widget


set workspace "~/9red/"
set projects {ninered-Android}

proc ::tcl_prompt {} {puts -nonewline "andgen>"}
set tcl_prompt1 ::tcl_prompt

TclReadLine::interact
